home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / pctjsp86.arc / KWIKAT.BAS < prev    next >
BASIC Source File  |  1986-06-24  |  895b  |  24 lines
  1.  
  2. 0 '*  AT keyboard repeat speedup sets the delay and repeat 
  3. 1 '*  then prints the values according to formulas found
  4. 2 '*  in the AT Technical Reference
  5. 3 '*
  6. 4 '*  The programming sequence is as follows: first output a command
  7. 5 '*  (0F3h) then output a delay-and-rate value.  Bits 5 and 6 control
  8. 6 '*  the delay ranging from 250 ms up to 1 second.  Bits 0 through 4
  9. 7 '*  identify the repeat rate, ranging from about 30 repeats per
  10. 8 '*  second to 2 repeats per second.
  11. 9 '*
  12. 10 PRINT "  AT keyboard speedup" 
  13. 15 PRINT "=low values are fastest="
  14. 20 INPUT "Initial delay (0-3): ",ID
  15. 30 INPUT "Repeat rate (0-31):  ",RR
  16. 40 OUT &H60,&HF3 :OUT &H60,(ID*32)OR RR
  17. 45 '** All set. Now calculate speed.
  18. 50 PRINT "initial delay is";
  19. 60 PRINT (ID+1) * .25;"seconds"
  20. 70 A=(RR AND 7) :B=(RR AND 24)\8
  21. 80 P=(8+A) * (2^B) * .00417
  22. 90 PRINT "repeat rate is";
  23. 95 PRINT 1/P;"per second"
  24.